home *** CD-ROM | disk | FTP | other *** search
/ SPACE 2 / SPACE - Library 2 - Volume 1.iso / apps / 262 / init2d.jil < prev    next >
Encoding:
Text File  |  1988-02-04  |  2.3 KB  |  166 lines
  1. hmsg Jesus is Lord;
  2.  
  3. echo Configuring JIL2D Shareware V1c ((2/03/88 Harvest Software Inc));
  4.  
  5. set PLOTTYPE HP;
  6.  
  7. set CURSCPT current;
  8.  
  9. set CURSWAIT = 150;
  10.  
  11. cursor $CURSCPT $CURSWAIT;
  12.  
  13. set ARCPLTRES = 5;
  14.  
  15. set PLTSIZE A;
  16.  
  17. set SAFETY off;
  18.  
  19. set FRACPREC = 32;
  20.  
  21. set UNITS in;
  22.  
  23. set DIMUNIT in;
  24.  
  25. set ASSOCIATE true;
  26.  
  27. set APAD = 1;
  28.  
  29. set XTYPE = 0;
  30.  
  31. set TITLEON true;
  32.  
  33. set SELECTION enclosed;
  34.  
  35. set JUSTIFY (-1 -1);
  36.  
  37. set SOUND true;
  38.  
  39. set SND on;
  40.  
  41. set XSPACE = .1;
  42.  
  43. set XANGLE = 45;
  44.  
  45. set WHICHPAD true;
  46.  
  47. set RUBBER false;
  48.  
  49. set STKMDE false;
  50.  
  51. set BLDIAM = 9/16;
  52.  
  53. set WCHPAD true;
  54.  
  55. set OSHOOT = .1;
  56.  
  57. set HEIGHT = 3/16;
  58.  
  59. set DIMFORMT #.##;
  60.  
  61. set TOLERANCE off;
  62.  
  63. set-action TOLERANCE (echo Tolerance $TOLERANCE);
  64.  
  65. set MID = 32000;
  66.  
  67. set ZOOM = 1;
  68.  
  69. set HITRAD = .1;
  70.  
  71. set OVRSHT = .1;
  72.  
  73. set PRZN = 2;
  74.  
  75. set DROP cursor;
  76.  
  77. set ARCREZ = 2;
  78.  
  79. set ARCERR = 1;
  80.  
  81. set ISSNAP = 1;
  82.  
  83. set CLECT select;
  84.  
  85. set WHAT enclosed;
  86.  
  87. set BLACKRATE = 3000;
  88.  
  89. set BG = 2;
  90.  
  91. set res @r1;
  92.  
  93. set USER11 null;
  94. set USER21 null;
  95. set USER31 null;
  96. set USER12 null;
  97. set USER22 null;
  98. set USER32 null;
  99. set USER13 null;
  100. set USER23 null;
  101. set USER33 null;
  102. set USER14 null;
  103. set USER24 null;
  104. set USER34 null;
  105. set USER15 null;
  106. set USER25 null;
  107. set USER35 null;
  108. set USER16 null;
  109. set USER26 null;
  110. set USER36 null;
  111. set USER17 bnull;
  112. set USER27 bnull;
  113. set USER37 bnull;
  114.  
  115. set TRIB selected;
  116. set TEACHMODE false;
  117. set DRAWGRID true;
  118. set STYLE = 1;
  119. set LAYER = 0;
  120. set SCROLLSIZE = 3;
  121. set GRIDSIZE = .25;
  122. set DWGSCALE = 1;
  123. set-action GRIDSIZE (if $DRAWGRID draw-grid);
  124. set-action TRIB (echo chosen attribute: $TRIB);
  125. set-action DWGSCALE (print-title);
  126. set-action TITLEON print-title;
  127.  
  128. @init 100;
  129.  
  130. read-cfg jil2d.cfg;
  131.  
  132. .read-macro scrnmenu.jil;
  133.  
  134. .read-macro scrnhelp.jil;
  135.  
  136. macro strokemode (
  137.     .write-file;
  138.     )
  139.  
  140. macro short-11B strokemode;
  141.  
  142. macro short-E08 strokemode;
  143.  
  144. set TXTSIZE = .156;
  145. set TITLSIZE = .25;
  146. set TXTANG = 0;
  147.  
  148. set INSTANG = 0;
  149. set INSTSCL = 1;
  150.  
  151. set PMODE true;
  152. set PANX = [element 0 [getscrn]];
  153. set PANY = [element 1 [getscrn]];
  154. installfonts;
  155. installlib;
  156. draw-pad;
  157. system-menu;
  158. setscroll 3;
  159. timer 120;
  160. grid;
  161. redraw;
  162.  
  163. echo The number of lines than can be saved is: 400;
  164. echo You must use JILCOMP if you need more complex drawings.;
  165. echo Welcome to the JIL2D Shareware Drafting Package! ((Version 1c));
  166.